auto numbering in autocad lisp